'From Pharo1.3 of 16 June 2011 [Latest update: #13307] on 24 October 2011 at 5:54:36 pm'!Object subclass: #DesenhistaDeCelula	instanceVariableNames: ''	classVariableNames: ''	poolDictionaries: ''	category: 'Jogo-Do-Laser-Inteligencia'!"-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- "!DesenhistaDeCelula class	instanceVariableNames: 'desenhista'!!DesenhistaDeCelula class methodsFor: 'as yet unclassified' stamp: 'SicknessVengeancePurity 10/24/2011 17:54'!novoDadoCelula: aCelula		| array  novaCelula|	array := self subclasses.			1 to: array size do:[ : desenhador|							(aCelula class = desenhador desenhaCelula)ifTrue:[				^desenhador new.				].		]. 			! !!DesenhistaDeCelula class methodsFor: 'as yet unclassified' stamp: 'SicknessVengeancePurity 10/24/2011 16:50'!tamanhoDaCelula^(50@50)! !